This function will return the shared lock on the directory that
the current directory was loaded from. You can use this to help
you find data files which were supplied with your program.
A NULL return is possible, which means that you may be running
from the Resident list.
You should NOT under any circumstance UnLock() this lock.
INPUTS
RESULT
A shared lock on the directory the program was started from.